home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 2: CDPD 1 / Almathera Ten on Ten - Disc 2: CDPD 1.iso / pd / 101-125 / 118 / empire / src / source.zoo / empfunc.g < prev    next >
Text File  |  1987-12-02  |  7KB  |  255 lines
  1. /* serial.d */
  2.  
  3. extern
  4.     setDTRoff()void,
  5.     setDTRon()void,
  6.     openSerialHandler()bool,
  7.     closeSerialHandler()void,
  8.     serialGetChar()char,
  9.     serialPutChar(char ch)void,
  10.     serialEcho(bool enabled)void,
  11.     serialActive()bool,
  12.     serialSpeed()*char,
  13.     serialHungup()bool,
  14.     serialGotControlC()bool;
  15.  
  16. /* fileio.d */
  17.  
  18. extern
  19.     abort(*char message)void,
  20.     closeFile()void,
  21.     openFile()void,
  22.     readWorld()void,
  23.     writeWorld()void,
  24.     readSector(int r, c; Sector_t s)void,
  25.     writeSector(int r, c; Sector_t s)void,
  26.     readShip(uint shipNumber; Ship_t sh)void,
  27.     writeShip(uint shipNumber; Ship_t sh)void,
  28.     readFleet(uint fleetNumber; Fleet_t fleet)void,
  29.     writeFleet(uint fleetNumber; Fleet_t fleet)void,
  30.     readLoan(uint loanNumber; Loan_t loan)void,
  31.     writeLoan(uint loanNumber; Loan_t loan)void,
  32.     readOffer(uint offerNumber; Offer_t offer)void,
  33.     writeOffer(uint offerNumber; Offer_t offer)void,
  34.     telegramStart(uint sender, receiver)void,
  35.     telegramEnd()void,
  36.     telegramOpen()void,
  37.     telegramRead(ulong endPosition)bool,
  38.     news(NewsType_t verb; uint actor, victim)void,
  39.     newsOpen(ulong date)bool,
  40.     newsNext(News_t n)bool;
  41.  
  42. /* util.d */
  43.  
  44. extern
  45.     readLine(*char buffer; uint length)bool,
  46.     ask(*char question)bool,
  47.     lookupCommand(*char commandList, command)uint,
  48.     writeDate(ulong date)void,
  49.     transRow(int r)uint,
  50.     transCol(int c)uint,
  51.     err(*char message)void,
  52.     getDesigName(SectorType_t desig)*char,
  53.     getItemName(ItemType_t itemType)*char,
  54.     getShipName(ShipType_t shipType)*char,
  55.     getIndex(*char types; char typ)uint,
  56.     min(int a, b)int,
  57.     umin(uint a, b)uint,
  58.     updateTimer()bool,
  59.     resetTimer()bool,
  60.     accessSector(int row, col; Sector_t s)void,
  61.     accessShip(uint shipNumber; Ship_t sh)void,
  62.     getBundleSize(SectorType_t sectorType; ItemType_t thingType)uint,
  63.     readQuan(Sector_t s; ItemType_t what)uint,
  64.     writeQuan(Sector_t s; ItemType_t what; uint quan)void,
  65.     getTransportCost(SectorType_t typ; ItemType_t what; uint quan)uint,
  66.     getTerrainCost(Sector_t s; ulong cost)ulong,
  67.     adjustForNewWorkers(Sector_t s; ItemType_t what; uint quan)void,
  68.     getTechFactor(uint country)uint,
  69.     getDefender(int r, c; Sector_t s; *int pRow, pCol)void,
  70.     putDefender(int r, c; Sector_t s; int rDefender, cDefender)void,
  71.     findDistance(int r1, c1, r2, c2)uint,
  72.     getItemCost(ItemType_t what)uint,
  73.     readShipQuan(Ship_t sh; ItemType_t what)uint,
  74.     writeShipQuan(Ship_t sh; ItemType_t what; uint quan)void,
  75.     getNavCost(ShipType_t shipType)uint;
  76.  
  77. /* update.d */
  78.  
  79. extern
  80.     weatherPreserve()void,
  81.     weatherRestore()void,
  82.     weatherStep()void,
  83.     weatherUpdate()void,
  84.     weather(uint r, c)int,
  85.     relativeSector(int r, c; uint dir; *int pNewR, pNewC)uint,
  86.     calcPlagueFactor(Sector_t s)uint,
  87.     updateSector(int r, c; Sector_t s)bool,
  88.     doShipDamage(uint shipNumber; Ship_t sh)void,
  89.     updateShip(uint shipNumber; Ship_t sh)bool;
  90.  
  91. /* startup.d */
  92.  
  93. extern
  94.     gotControlC()bool,
  95.     pause(uint tenths)void,
  96.     writeChar(char ch)void,
  97.     writeString(*char st)void,
  98.     getPassword(*char prompt, existingPassword)bool,
  99.     printFile(*char fileName)void,
  100.     getVerifiedPassword(*char prompt)bool,
  101.     putPrompt()void,
  102.     random(uint rang)uint;
  103.  
  104. /* parse.d */
  105.  
  106. extern
  107.     skipBlanks()void,
  108.     doSkipBlanks()bool,
  109.     skipWord()void,
  110.     getNumber(*int pNumber)bool,
  111.     reqNumber(*int pN; *char prompt)bool,
  112.     getPosRange(*uint pQuan; uint maximum)bool,
  113.     reqPosRange(*uint pQuan; uint maximum; *char prompt)bool,
  114.     reqPosRange1(*uint pNumber; uint maximum; *char prompt)bool,
  115.     getBox(*int pA, pB, pC, pD)bool,
  116.     reqBox(*int pA, pB, pC, pD; *char prompt)bool,
  117.     reqSector(*int pA, pB; *char prompt)bool,
  118.     reqChar(*char pChar, validSet, prompt, errMess)bool,
  119.     reqCmsgpob(*ItemType_t pWhich; *char prompt)bool,
  120.     reqDesig(*SectorType_t pDesig; *char prompt)bool,
  121.     reqShipType(*ShipType_t pType; *char prompt)bool,
  122.     reqBridgeDirection(*char pDir, prompt)bool,
  123.     reqCountry(*uint pCountry; *char prompt)bool,
  124.     getChoice(*uint pChoice; *char choices)bool,
  125.     reqChoice(*uint pChoice; *char choices, prompt)bool,
  126.     reqShip(*uint pShip; *char prompt)bool,
  127.     reqSectorOrShip(*int pA, pB; *uint pS; *bool pIsShip; *char prompt)bool,
  128.     reqShipOrFleet(*uint pShipNumber; *char pFleet, prompt)bool;
  129.  
  130. /* scan.d */
  131.  
  132. extern
  133.     setAllShips()void,
  134.     reqShips(*char prompt)bool,
  135.     scanShips(proc(uint shipNumber; Ship_t sh)void scanner)uint,
  136.     reqSectors(*char prompt)bool,
  137.     setMapHook()void,
  138.     scanSectors(proc(int row, col; Sector_t s)void scanner)uint;
  139.  
  140. /* messages.d */
  141.  
  142. extern
  143.     cmd_telegram()void,
  144.     telegramCheck()void,
  145.     cmd_read()void,
  146.     cmd_headlines()void,
  147.     cmd_newspaper()void;
  148.  
  149. /* cmd_general1.d */
  150.  
  151. extern
  152.     cmd_change()void,
  153.     cmd_translate()void,
  154.     cmd_country()void,
  155.     cmd_census()void,
  156.     zapSpan(Sector_t s)void,
  157.     collapseSpans(int r, c)void,
  158.     cmd_designate()bool,
  159.     cmd_checkpoint()bool,
  160.     cmd_update()bool,
  161.     cmd_nation()void,
  162.     cmd_contract()bool,
  163.     cmd_realm()void;
  164.  
  165. /* cmd_general2.d */
  166.  
  167. extern
  168.     cmd_deliver()bool,
  169.     cmd_enlist()bool,
  170.     cmd_defend()bool,
  171.     cmd_power()void,
  172.     cmd_grant()bool,
  173.     cmd_spy()bool,
  174.     cmd_dump()void;
  175.  
  176. /* cmd_general3.d */
  177.  
  178. extern
  179.     cmd_build()bool,
  180.     cmd_declare()bool,
  181.     cmd_lend()bool,
  182.     cmd_accept()bool,
  183.     cmd_repay()bool,
  184.     cmd_ledger()void,
  185.     cmd_collect()bool;
  186.  
  187. /* cmd_general4.d */
  188.  
  189. extern
  190.     cmd_price()bool,
  191.     cmd_report()bool,
  192.     cmd_buy()bool;
  193.  
  194. /* cmd_map.d */
  195.  
  196. extern
  197.     near(int r, c; uint user; *uint pDir)bool,
  198.     mapCoords(int left, right)void,
  199.     mapRowStart(int r)void,
  200.     mapRowEnd(int r)void,
  201.     mapEmpty()void,
  202.     cmd_map()bool,
  203.     cmd_route()bool,
  204.     cmd_radar()bool,
  205.     cmd_weather()void,
  206.     cmd_forecast()bool;
  207.  
  208. /* cmd_move.d */
  209.  
  210. extern
  211.     cmd_move()bool,
  212.     cmd_fly()bool,
  213.     cmd_navigate()bool;
  214.  
  215. /* cmd_fight.d */
  216.  
  217. extern
  218.     unTransRow(uint country, row)int,
  219.     unTransCol(uint country, col)int,
  220.     targetRow(int r; Sector_t s)int,
  221.     targetCol(int c; Sector_t s)int,
  222.     damageUnit(uint quantity, damage)uint,
  223.     cmd_attack()bool,
  224.     damageSector(Sector_t s; uint damage)void,
  225.     damageShip(Ship_t sh; uint damage)void,
  226.     cmd_fire()bool,
  227.     cmd_board()bool,
  228.     cmd_assault()bool;
  229.  
  230. /* cmd_naval.d */
  231.  
  232. extern
  233.     cmd_ships()bool,
  234.     cmd_load()bool,
  235.     fleetPos(char ch)uint,
  236.     removeFromFleet(uint owner, shipNumber; Ship_t sh)void,
  237.     cmd_fleet()void,
  238.     cmd_mine()bool,
  239.     cmd_unload()bool,
  240.     cmd_tend()bool,
  241.     cmd_torpedo()bool,
  242.     cmd_drop()bool,
  243.     cmd_lookout()bool;
  244.  
  245. /* cmd_edit.d */
  246.  
  247. extern
  248.     cmd_examine()void,
  249.     cmd_edit()void;
  250.  
  251. /* command.d */
  252.  
  253. extern
  254.     processCommands()void;
  255.